home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1993 July / InfoMagic USENET CD-ROM July 1993.ISO / sources / x / volume11 / boss / patch1 next >
Encoding:
Internet Message Format  |  1991-02-16  |  68.3 KB

  1. Path: uunet!cs.utexas.edu!sun-barr!newstop!exodus!trantor.harris-atd.com
  2. From: news@trantor.harris-atd.com (News stuff)
  3. Newsgroups: comp.sources.x
  4. Subject: v11i081: boss transfer data from Casio BOSS to workstations, Patch1, Part01/01
  5. Message-ID: <8077@exodus.Eng.Sun.COM>
  6. Date: 16 Feb 91 21:19:10 GMT
  7. References: <csx-11i081:boss@uunet.UU.NET>
  8. Sender: news@exodus.Eng.Sun.COM
  9. Lines: 2167
  10. Approved: argv@sun.com
  11.  
  12. Submitted-by: news@trantor.harris-atd.com (News stuff)
  13. Posting-number: Volume 11, Issue 81
  14. Archive-name: boss/patch1
  15. Patch-To: boss: Volume 10, Issue 3-8, 91
  16.  
  17.      An examination of the comp.sources.x archives leads me to believe that
  18. the first patch for Boss did not make it out.  To remedy this, I am reposting
  19. this, the first patch for Boss 1.0.  Patch #2 is going to be reposted
  20. directly following this posting.
  21.  
  22. Chuck Musciano                ARPA  : chuck@trantor.harris-atd.com
  23. Harris Corporation             Usenet: ...!uunet!x102a!trantor!chuck
  24. PO Box 37, MS 3A/1912            AT&T  : (407) 727-6131
  25. Melbourne, FL 32902            FAX   : (407) 729-3363
  26.  
  27. A good newspaper is never good enough,
  28.     but a lousy newspaper is a joy forever.        -- Garrison Keillor
  29.  
  30. #! /bin/sh
  31. # This is a shell archive.  Remove anything before this line, then unpack
  32. # it by saving it into a file and typing "sh file".  To overwrite existing
  33. # files, type "sh file -c".  You can also feed this as standard input via
  34. # unshar, or by typing "sh <file", e.g..  If this archive is complete, you
  35. # will see the following message at the end:
  36. #        "End of shell archive."
  37. # Contents:  patch
  38. # Wrapped by chuck@melmac on Mon Jan 28 12:15:46 1991
  39. PATH=/bin:/usr/bin:/usr/ucb ; export PATH
  40. if test -f 'patch' -a "${1}" != "-c" ; then 
  41.   echo shar: Will not clobber existing file \"'patch'\"
  42. else
  43. echo shar: Extracting \"'patch'\" \(65348 characters\)
  44. sed "s/^X//" >'patch' <<'END_OF_FILE'
  45. X*** Makefile.orig    Fri Nov 30 08:44:04 1990
  46. X--- Makefile    Thu Nov  1 16:19:05 1990
  47. X***************
  48. X*** 8,13 ****
  49. X--- 8,16 ----
  50. X  # Where to install the help file
  51. X  HELPDIR        = /usr/local/lib/help
  52. X  
  53. X+ # Your system mailer
  54. X+ MAILER        = /usr/ucb/mail
  55. X+ 
  56. X  # Where you installed Open Windows
  57. X  OPENWINHOME    = /usr/openwin
  58. X  
  59. X***************
  60. X*** 15,30 ****
  61. X  LDFLAGS        = -L$(OPENWINHOME)/lib
  62. X  
  63. X  # Where your XView include files are installed
  64. X! CPPFLAGS    = -I$(OPENWINHOME)/include
  65. X  
  66. X! OFILES    =     boss.o boss_ui.o calentool.o casio_master.o casio_slave.o \
  67. X!         database.o do_clear.o do_load.o do_port.o do_schedule.o do_store.o \
  68. X!         expand.o misc.o object.o packet.o parse.o print.o \
  69. X!         record.o window_misc.o
  70. X  
  71. X  OPTIONS        = -O
  72. X  
  73. X! CPPFLAGS    = -I$(OPENWINHOME)/include
  74. X  LDFLAGS        = -L$(OPENWINHOME)/lib
  75. X  LDLIBS        = -lxview -lolgx -lX
  76. X  
  77. X--- 18,34 ----
  78. X  LDFLAGS        = -L$(OPENWINHOME)/lib
  79. X  
  80. X  # Where your XView include files are installed
  81. X! CPPFLAGS    = -I$(OPENWINHOME)/include -DMAILER=\"$(MAILER)\"
  82. X  
  83. X! OFILES        = about.o boss.o boss_ui.o busy.o calentool.o casio_master.o casio_slave.o \
  84. X!           database.o do_clear.o do_load.o do_port.o do_schedule.o do_store.o \
  85. X!           expand.o filename_completion.o list_misc.o misc.o object.o packet.o \
  86. X!           parse.o pinned_menu_notify.o place_dialog.o print.o \
  87. X!           record.o send_mail.o window_misc.o
  88. X  
  89. X  OPTIONS        = -O
  90. X  
  91. X! CPPFLAGS    = -I$(OPENWINHOME)/include -DMAILER=\"$(MAILER)\"
  92. X  LDFLAGS        = -L$(OPENWINHOME)/lib
  93. X  LDLIBS        = -lxview -lolgx -lX
  94. X  
  95. X*** Imakefile.orig    Fri Nov 30 08:44:07 1990
  96. X--- Imakefile    Thu Nov  1 16:19:05 1990
  97. X***************
  98. X*** 2,22 ****
  99. X  
  100. X  HELPDIR        = /usr/local/lib/help
  101. X  
  102. X  LOCAL_LIBRARIES = -lxview -lolgx $(XLIB)
  103. X  
  104. X  LDOPTIONS    = -L$(OPENWINHOME)/lib
  105. X  
  106. X! CFLAGS        = -O -I$(OPENWINHOME)/include
  107. X  
  108. X! SRCS        = boss.c boss_ui.c calentool.c casio_master.c casio_slave.c \
  109. X            database.c do_clear.c do_load.c do_port.c do_schedule.c do_store.c \
  110. X!           expand.c misc.c object.c packet.c parse.y print.c \
  111. X!           record.c window_misc.c
  112. X  
  113. X! OBJS        = boss.o boss_ui.o calentool.o casio_master.o casio_slave.o \
  114. X            database.o do_clear.o do_load.o do_port.o do_schedule.o do_store.o \
  115. X!           expand.o misc.o object.o packet.o parse.o print.o \
  116. X!           record.o window_misc.o
  117. X  
  118. X  ComplexProgramTarget(boss)
  119. X  
  120. X--- 2,24 ----
  121. X  
  122. X  HELPDIR        = /usr/local/lib/help
  123. X  
  124. X+ MAILER        = /usr/ucb/mail
  125. X+ 
  126. X  LOCAL_LIBRARIES = -lxview -lolgx $(XLIB)
  127. X  
  128. X  LDOPTIONS    = -L$(OPENWINHOME)/lib
  129. X  
  130. X! CFLAGS        = -O -I$(OPENWINHOME)/include -DMAILER=\"$(MAILER)\"
  131. X  
  132. X! SRCS        = about.c boss.c boss_ui.c busy.c calentool.c casio_master.c casio_slave.c \
  133. X            database.c do_clear.c do_load.c do_port.c do_schedule.c do_store.c \
  134. X!           expand.c filename_completion.c list_misc.c misc.c object.c packet.c parse.y pinned_menu_notify.c place_dialog.c print.c \
  135. X!           record.c send_mail.c window_misc.c
  136. X  
  137. X! SRCS        = about.o boss.o boss_ui.o busy.o calentool.o casio_master.o casio_slave.o \
  138. X            database.o do_clear.o do_load.o do_port.o do_schedule.o do_store.o \
  139. X!           expand.o filename_completion.o list_misc.o misc.o object.o packet.o parse.o pinned_menu_notify.o place_dialog.o print.o \
  140. X!           record.o send_mail.o window_misc.o
  141. X  
  142. X  ComplexProgramTarget(boss)
  143. X  
  144. X*** boss.info.orig    Fri Nov 30 08:44:09 1990
  145. X--- boss.info    Fri Nov 30 08:15:32 1990
  146. X***************
  147. X*** 7,13 ****
  148. X  Boss 1.0 provides an interface between your workstation and a Casio BOSS Digital Diary.  Using Boss 1.0, you can load and store data to and from your Casio BOSS.
  149. X  # 
  150. X  :file_button
  151. X! The "File" button provides access to the basic Boss functions: loading and storing data, as well as converting schedule items to other formats.
  152. X  # 
  153. X  :view_button
  154. X  The "View" button provides access to the "Clear entries" dialog box.
  155. X--- 7,13 ----
  156. X  Boss 1.0 provides an interface between your workstation and a Casio BOSS Digital Diary.  Using Boss 1.0, you can load and store data to and from your Casio BOSS.
  157. X  # 
  158. X  :file_button
  159. X! The "File" button provides access to the basic Boss functions: loading and storing data, as well as converting schedule items to other formats.  You can also read about the history of Boss, and send mail to the developer.
  160. X  # 
  161. X  :view_button
  162. X  The "View" button provides access to the "Clear entries" dialog box.
  163. X***************
  164. X*** 150,152 ****
  165. X--- 150,227 ----
  166. X  # 
  167. X  :schedule_accept
  168. X  When you click the "Schedule" button, the schedule items held in Boss memory will be converted to the desired format.  Certain files may be modified during the conversion.
  169. X+ # 
  170. X+ :about_controls
  171. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  172. X+ # 
  173. X+ :msg_1
  174. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  175. X+ # 
  176. X+ :msg_5
  177. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  178. X+ # 
  179. X+ :msg_6
  180. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  181. X+ # 
  182. X+ :msg_7
  183. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  184. X+ # 
  185. X+ :msg_8
  186. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  187. X+ # 
  188. X+ :msg_9
  189. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  190. X+ # 
  191. X+ :msg_11
  192. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  193. X+ # 
  194. X+ :msg_12
  195. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  196. X+ # 
  197. X+ :msg_13
  198. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  199. X+ # 
  200. X+ :msg_14
  201. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  202. X+ # 
  203. X+ :msg_16
  204. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  205. X+ # 
  206. X+ :msg_17
  207. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  208. X+ # 
  209. X+ :msg_18
  210. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  211. X+ # 
  212. X+ :msg_19
  213. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  214. X+ # 
  215. X+ :msg_20
  216. X+ This window gives you some details about the development of boss, encourages you to correspond with the developer to improve future versions of boss, and delineates the restrictions placed on the boss source code.
  217. X+ # 
  218. X+ :send_mail
  219. X+ Clicking this button will open another window in which you can compose and send mail to the developer of boss.
  220. X+ # 
  221. X+ :mail_controls
  222. X+ This window allows you to send mail concerning boss to its developer.  You are encouraged to send comments and suggestions in order to make boss a better tool.
  223. X+ # 
  224. X+ :msg_21
  225. X+ This window allows you to send mail concerning boss to its developer.  You are encouraged to send comments and suggestions in order to make boss a better tool.
  226. X+ # 
  227. X+ :msg_22
  228. X+ This window allows you to send mail concerning boss to its developer.  You are encouraged to send comments and suggestions in order to make boss a better tool.
  229. X+ # 
  230. X+ :address
  231. X+ This choice item lets you select the address to which your mail will be sent.  If your machine understands Internet-style addresses, you should use the first choice item.  If you are a UUCP-based site, you should use the second item.  If neither address works, use the third item to enter a valid address.
  232. X+ # 
  233. X+ :other_address
  234. X+ This text field is used to enter an e-mail address to which your mail will be sent.  It should only be used if the two default addresses do not work from your site.
  235. X+ # 
  236. X+ :mail_controls1
  237. X+ This window allows you to send mail concerning boss to its developer.  You are encouraged to send comments and suggestions in order to make boss a better tool.
  238. X+ # 
  239. X+ :accept_send
  240. X+ Clicking this button will send your mail message to boss's developer.
  241. X+ # 
  242. X+ :cancel_mail
  243. X+ Clicking this button cancels the message you were going to send.
  244. X*** about.c.orig    Fri Nov 30 08:44:10 1990
  245. X--- about.c    Thu Nov  1 16:15:59 1990
  246. X***************
  247. X*** 0 ****
  248. X--- 1,56 ----
  249. X+ /************************************************************************/
  250. X+ /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  251. X+ /*                                    */
  252. X+ /*    Permission to use, copy, modify, and distribute this software    */
  253. X+ /*    and its documentation for any purpose and without fee is    */
  254. X+ /*    hereby granted, provided that the above copyright notice    */
  255. X+ /*    appear in all copies and that both that copyright notice and    */
  256. X+ /*    this permission notice appear in supporting documentation, and    */
  257. X+ /*    that the name of Chuck Musciano and Harris Corporation not be    */
  258. X+ /*    used in advertising or publicity pertaining to distribution    */
  259. X+ /*    of the software without specific, written prior permission.    */
  260. X+ /*    Chuck Musciano and Harris Corporation make no representations    */
  261. X+ /*    about the suitability of this software for any purpose.  It is    */
  262. X+ /*    provided "as is" without express or implied warranty.        */
  263. X+ /*                                    */
  264. X+ /*    This code contains data and information that is proprietary    */
  265. X+ /*    to Casio Corporation.  You may be subject to legal action if    */
  266. X+ /*    this information is released without explicit permission from    */
  267. X+ /*    Casio.                                */
  268. X+ /************************************************************************/
  269. X+ 
  270. X+ /************************************************************************/
  271. X+ /*                                    */
  272. X+ /*    about.c        display a little information window        */
  273. X+ /*                                    */
  274. X+ /************************************************************************/
  275. X+ 
  276. X+ #include    <stdio.h>
  277. X+ #include    <sys/param.h>
  278. X+ #include    <sys/types.h>
  279. X+ #include    <xview/xview.h>
  280. X+ #include    <xview/panel.h>
  281. X+ #include    "boss_ui.h"
  282. X+ 
  283. X+ #include    "manifest.h"
  284. X+ 
  285. X+ PUBLIC    boss_base_objects    *boss_base;
  286. X+ 
  287. X+ PRIVATE    boss_about_objects    *dialog = NULL;
  288. X+ 
  289. X+ /************************************************************************/
  290. X+ EXPORT    Menu_item    popup_about_boss(item, op)
  291. X+ 
  292. X+ Menu_item    item;
  293. X+ Menu_generate    op;
  294. X+ 
  295. X+ {
  296. X+     if (op == MENU_NOTIFY) {
  297. X+        if (dialog == NULL) {
  298. X+           dialog = boss_about_objects_initialize(NULL, boss_base->base);
  299. X+           place_dialog(boss_base->base, dialog->about);
  300. X+           }
  301. X+        xv_set(dialog->about, XV_SHOW, TRUE, NULL);
  302. X+        }
  303. X+     return item;
  304. X+ }
  305. X*** boss_ui.c.orig    Fri Nov 30 08:44:12 1990
  306. X--- boss_ui.c    Fri Nov 30 08:15:35 1990
  307. X***************
  308. X*** 1,24 ****
  309. X- /************************************************************************/
  310. X- /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  311. X- /*                                    */
  312. X- /*    Permission to use, copy, modify, and distribute this software    */
  313. X- /*    and its documentation for any purpose and without fee is    */
  314. X- /*    hereby granted, provided that the above copyright notice    */
  315. X- /*    appear in all copies and that both that copyright notice and    */
  316. X- /*    this permission notice appear in supporting documentation, and    */
  317. X- /*    that the name of Chuck Musciano and Harris Corporation not be    */
  318. X- /*    used in advertising or publicity pertaining to distribution    */
  319. X- /*    of the software without specific, written prior permission.    */
  320. X- /*    Chuck Musciano and Harris Corporation make no representations    */
  321. X- /*    about the suitability of this software for any purpose.  It is    */
  322. X- /*    provided "as is" without express or implied warranty.        */
  323. X- /*                                    */
  324. X- /*    This code contains data and information that is proprietary    */
  325. X- /*    to Casio Corporation.  You may be subject to legal action if    */
  326. X- /*    this information is released without explicit permission from    */
  327. X- /*    Casio.                                */
  328. X- /************************************************************************/
  329. X- 
  330. X  /*
  331. X   * boss_ui.c - User interface object initialization functions.
  332. X   * This file was generated by `gxv' from `boss.G'.
  333. X--- 1,3 ----
  334. X***************
  335. X*** 52,57 ****
  336. X--- 31,37 ----
  337. X      extern Menu_item    load_dialog();
  338. X      extern Menu_item    store_dialog();
  339. X      extern Menu_item    schedule_dialog();
  340. X+     extern Menu_item    popup_about_boss();
  341. X      Xv_opaque    obj;
  342. X      
  343. X      obj = xv_create(XV_NULL, MENU_COMMAND_MENU,
  344. X***************
  345. X*** 71,76 ****
  346. X--- 51,61 ----
  347. X              MENU_STRING, "Schedule Appointments...",
  348. X              MENU_GEN_PROC, schedule_dialog,
  349. X              NULL,
  350. X+         MENU_ITEM,
  351. X+             XV_KEY_DATA, INSTANCE, ip,
  352. X+             MENU_STRING, "About Boss...",
  353. X+             MENU_GEN_PROC, popup_about_boss,
  354. X+             NULL,
  355. X          MENU_DEFAULT, 2,
  356. X          MENU_GEN_PIN_WINDOW, (Xv_opaque) ip[0], "File",
  357. X          NULL);
  358. X***************
  359. X*** 207,213 ****
  360. X          XV_KEY_DATA, INSTANCE, ip,
  361. X          XV_WIDTH, 256,
  362. X          XV_HEIGHT, 88,
  363. X!         XV_LABEL, "Boss 1.0",
  364. X          FRAME_CLOSED, FALSE,
  365. X          FRAME_SHOW_FOOTER, FALSE,
  366. X          FRAME_SHOW_RESIZE_CORNER, FALSE,
  367. X--- 192,198 ----
  368. X          XV_KEY_DATA, INSTANCE, ip,
  369. X          XV_WIDTH, 256,
  370. X          XV_HEIGHT, 88,
  371. X!         XV_LABEL, "Boss 1.0a",
  372. X          FRAME_CLOSED, FALSE,
  373. X          FRAME_SHOW_FOOTER, FALSE,
  374. X          FRAME_SHOW_RESIZE_CORNER, FALSE,
  375. X***************
  376. X*** 1552,1557 ****
  377. X--- 1537,2362 ----
  378. X          XV_HEIGHT, 20,
  379. X          PANEL_LABEL_STRING, "Schedule",
  380. X          PANEL_NOTIFY_PROC, accept_schedule,
  381. X+         NULL);
  382. X+     return obj;
  383. X+ }
  384. X+ 
  385. X+ /*
  386. X+  * Initialize an instance of object `about'.
  387. X+  */
  388. X+ boss_about_objects *
  389. X+ boss_about_objects_initialize(ip, owner)
  390. X+     boss_about_objects    *ip;
  391. X+     Xv_opaque    owner;
  392. X+ {
  393. X+     if (!ip && !(ip = (boss_about_objects *) calloc(1, sizeof (boss_about_objects))))
  394. X+         return (boss_about_objects *) NULL;
  395. X+     if (!ip->about)
  396. X+         ip->about = boss_about_about_create(ip, owner);
  397. X+     if (!ip->about_controls)
  398. X+         ip->about_controls = boss_about_about_controls_create(ip, ip->about);
  399. X+     if (!ip->msg_1)
  400. X+         ip->msg_1 = boss_about_msg_1_create(ip, ip->about_controls);
  401. X+     if (!ip->msg_5)
  402. X+         ip->msg_5 = boss_about_msg_5_create(ip, ip->about_controls);
  403. X+     if (!ip->msg_6)
  404. X+         ip->msg_6 = boss_about_msg_6_create(ip, ip->about_controls);
  405. X+     if (!ip->msg_7)
  406. X+         ip->msg_7 = boss_about_msg_7_create(ip, ip->about_controls);
  407. X+     if (!ip->msg_8)
  408. X+         ip->msg_8 = boss_about_msg_8_create(ip, ip->about_controls);
  409. X+     if (!ip->msg_9)
  410. X+         ip->msg_9 = boss_about_msg_9_create(ip, ip->about_controls);
  411. X+     if (!ip->msg_11)
  412. X+         ip->msg_11 = boss_about_msg_11_create(ip, ip->about_controls);
  413. X+     if (!ip->msg_12)
  414. X+         ip->msg_12 = boss_about_msg_12_create(ip, ip->about_controls);
  415. X+     if (!ip->msg_13)
  416. X+         ip->msg_13 = boss_about_msg_13_create(ip, ip->about_controls);
  417. X+     if (!ip->msg_14)
  418. X+         ip->msg_14 = boss_about_msg_14_create(ip, ip->about_controls);
  419. X+     if (!ip->msg_16)
  420. X+         ip->msg_16 = boss_about_msg_16_create(ip, ip->about_controls);
  421. X+     if (!ip->msg_17)
  422. X+         ip->msg_17 = boss_about_msg_17_create(ip, ip->about_controls);
  423. X+     if (!ip->msg_18)
  424. X+         ip->msg_18 = boss_about_msg_18_create(ip, ip->about_controls);
  425. X+     if (!ip->msg_19)
  426. X+         ip->msg_19 = boss_about_msg_19_create(ip, ip->about_controls);
  427. X+     if (!ip->msg_20)
  428. X+         ip->msg_20 = boss_about_msg_20_create(ip, ip->about_controls);
  429. X+     if (!ip->message6)
  430. X+         ip->message6 = boss_about_message6_create(ip, ip->about_controls);
  431. X+     if (!ip->message7)
  432. X+         ip->message7 = boss_about_message7_create(ip, ip->about_controls);
  433. X+     if (!ip->send_mail)
  434. X+         ip->send_mail = boss_about_send_mail_create(ip, ip->about_controls);
  435. X+     return ip;
  436. X+ }
  437. X+ 
  438. X+ /*
  439. X+  * Create object `about' in the specified instance.
  440. X+ 
  441. X+  */
  442. X+ Xv_opaque
  443. X+ boss_about_about_create(ip, owner)
  444. X+     caddr_t        ip;
  445. X+     Xv_opaque    owner;
  446. X+ {
  447. X+     Xv_opaque    obj;
  448. X+     
  449. X+     obj = xv_create(owner, FRAME_CMD,
  450. X+         XV_KEY_DATA, INSTANCE, ip,
  451. X+         XV_WIDTH, 509,
  452. X+         XV_HEIGHT, 392,
  453. X+         XV_LABEL, "Boss: About Boss",
  454. X+         XV_SHOW, FALSE,
  455. X+         FRAME_SHOW_FOOTER, FALSE,
  456. X+         FRAME_SHOW_RESIZE_CORNER, FALSE,
  457. X+         FRAME_CMD_PUSHPIN_IN, TRUE,
  458. X+         NULL);
  459. X+     xv_set(xv_get(obj, FRAME_CMD_PANEL), WIN_SHOW, FALSE, NULL);
  460. X+     return obj;
  461. X+ }
  462. X+ 
  463. X+ /*
  464. X+  * Create object `about_controls' in the specified instance.
  465. X+ 
  466. X+  */
  467. X+ Xv_opaque
  468. X+ boss_about_about_controls_create(ip, owner)
  469. X+     caddr_t        ip;
  470. X+     Xv_opaque    owner;
  471. X+ {
  472. X+     Xv_opaque    obj;
  473. X+     
  474. X+     obj = xv_create(owner, PANEL,
  475. X+         XV_KEY_DATA, INSTANCE, ip,
  476. X+         XV_HELP_DATA, "boss:about_controls",
  477. X+         XV_X, 0,
  478. X+         XV_Y, 0,
  479. X+         XV_WIDTH, WIN_EXTEND_TO_EDGE,
  480. X+         XV_HEIGHT, WIN_EXTEND_TO_EDGE,
  481. X+         WIN_BORDER, FALSE,
  482. X+         NULL);
  483. X+     return obj;
  484. X+ }
  485. X+ 
  486. X+ /*
  487. X+  * Create object `msg_1' in the specified instance.
  488. X+ 
  489. X+  */
  490. X+ Xv_opaque
  491. X+ boss_about_msg_1_create(ip, owner)
  492. X+     caddr_t        ip;
  493. X+     Xv_opaque    owner;
  494. X+ {
  495. X+     Xv_opaque    obj;
  496. X+     
  497. X+     obj = xv_create(owner, PANEL_MESSAGE,
  498. X+         XV_KEY_DATA, INSTANCE, ip,
  499. X+         XV_HELP_DATA, "boss:msg_1",
  500. X+         XV_X, 222,
  501. X+         XV_Y, 14,
  502. X+         XV_WIDTH, 65,
  503. X+         XV_HEIGHT, 13,
  504. X+         PANEL_LABEL_STRING, "Boss 1.0a",
  505. X+         PANEL_LABEL_BOLD, TRUE,
  506. X+         NULL);
  507. X+     return obj;
  508. X+ }
  509. X+ 
  510. X+ /*
  511. X+  * Create object `msg_5' in the specified instance.
  512. X+ 
  513. X+  */
  514. X+ Xv_opaque
  515. X+ boss_about_msg_5_create(ip, owner)
  516. X+     caddr_t        ip;
  517. X+     Xv_opaque    owner;
  518. X+ {
  519. X+     Xv_opaque    obj;
  520. X+     
  521. X+     obj = xv_create(owner, PANEL_MESSAGE,
  522. X+         XV_KEY_DATA, INSTANCE, ip,
  523. X+         XV_HELP_DATA, "boss:msg_5",
  524. X+         XV_X, 202,
  525. X+         XV_Y, 30,
  526. X+         XV_WIDTH, 104,
  527. X+         XV_HEIGHT, 13,
  528. X+         PANEL_LABEL_STRING, "Copyright 1990",
  529. X+         PANEL_LABEL_BOLD, TRUE,
  530. X+         NULL);
  531. X+     return obj;
  532. X+ }
  533. X+ 
  534. X+ /*
  535. X+  * Create object `msg_6' in the specified instance.
  536. X+ 
  537. X+  */
  538. X+ Xv_opaque
  539. X+ boss_about_msg_6_create(ip, owner)
  540. X+     caddr_t        ip;
  541. X+     Xv_opaque    owner;
  542. X+ {
  543. X+     Xv_opaque    obj;
  544. X+     
  545. X+     obj = xv_create(owner, PANEL_MESSAGE,
  546. X+         XV_KEY_DATA, INSTANCE, ip,
  547. X+         XV_HELP_DATA, "boss:msg_6",
  548. X+         XV_X, 117,
  549. X+         XV_Y, 46,
  550. X+         XV_WIDTH, 274,
  551. X+         XV_HEIGHT, 13,
  552. X+         PANEL_LABEL_STRING, "Chuck Musciano and Harris Corporation",
  553. X+         PANEL_LABEL_BOLD, TRUE,
  554. X+         NULL);
  555. X+     return obj;
  556. X+ }
  557. X+ 
  558. X+ /*
  559. X+  * Create object `msg_7' in the specified instance.
  560. X+ 
  561. X+  */
  562. X+ Xv_opaque
  563. X+ boss_about_msg_7_create(ip, owner)
  564. X+     caddr_t        ip;
  565. X+     Xv_opaque    owner;
  566. X+ {
  567. X+     Xv_opaque    obj;
  568. X+     
  569. X+     obj = xv_create(owner, PANEL_MESSAGE,
  570. X+         XV_KEY_DATA, INSTANCE, ip,
  571. X+         XV_HELP_DATA, "boss:msg_7",
  572. X+         XV_X, 185,
  573. X+         XV_Y, 62,
  574. X+         XV_WIDTH, 135,
  575. X+         XV_HEIGHT, 13,
  576. X+         PANEL_LABEL_STRING, "All Rights Reserved",
  577. X+         PANEL_LABEL_BOLD, TRUE,
  578. X+         NULL);
  579. X+     return obj;
  580. X+ }
  581. X+ 
  582. X+ /*
  583. X+  * Create object `msg_8' in the specified instance.
  584. X+ 
  585. X+  */
  586. X+ Xv_opaque
  587. X+ boss_about_msg_8_create(ip, owner)
  588. X+     caddr_t        ip;
  589. X+     Xv_opaque    owner;
  590. X+ {
  591. X+     Xv_opaque    obj;
  592. X+     
  593. X+     obj = xv_create(owner, PANEL_MESSAGE,
  594. X+         XV_KEY_DATA, INSTANCE, ip,
  595. X+         XV_HELP_DATA, "boss:msg_8",
  596. X+         XV_X, 14,
  597. X+         XV_Y, 94,
  598. X+         XV_WIDTH, 474,
  599. X+         XV_HEIGHT, 13,
  600. X+         PANEL_LABEL_STRING, "Boss was written using Sun's Devguide interface builder and the XView OPEN",
  601. X+         PANEL_LABEL_BOLD, FALSE,
  602. X+         NULL);
  603. X+     return obj;
  604. X+ }
  605. X+ 
  606. X+ /*
  607. X+  * Create object `msg_9' in the specified instance.
  608. X+ 
  609. X+  */
  610. X+ Xv_opaque
  611. X+ boss_about_msg_9_create(ip, owner)
  612. X+     caddr_t        ip;
  613. X+     Xv_opaque    owner;
  614. X+ {
  615. X+     Xv_opaque    obj;
  616. X+     
  617. X+     obj = xv_create(owner, PANEL_MESSAGE,
  618. X+         XV_KEY_DATA, INSTANCE, ip,
  619. X+         XV_HELP_DATA, "boss:msg_9",
  620. X+         XV_X, 14,
  621. X+         XV_Y, 110,
  622. X+         XV_WIDTH, 354,
  623. X+         XV_HEIGHT, 13,
  624. X+         PANEL_LABEL_STRING, "LOOK toolkit.  It was initially released in October of 1990.",
  625. X+         PANEL_LABEL_BOLD, FALSE,
  626. X+         NULL);
  627. X+     return obj;
  628. X+ }
  629. X+ 
  630. X+ /*
  631. X+  * Create object `msg_11' in the specified instance.
  632. X+ 
  633. X+  */
  634. X+ Xv_opaque
  635. X+ boss_about_msg_11_create(ip, owner)
  636. X+     caddr_t        ip;
  637. X+     Xv_opaque    owner;
  638. X+ {
  639. X+     Xv_opaque    obj;
  640. X+     
  641. X+     obj = xv_create(owner, PANEL_MESSAGE,
  642. X+         XV_KEY_DATA, INSTANCE, ip,
  643. X+         XV_HELP_DATA, "boss:msg_11",
  644. X+         XV_X, 14,
  645. X+         XV_Y, 142,
  646. X+         XV_WIDTH, 454,
  647. X+         XV_HEIGHT, 13,
  648. X+         PANEL_LABEL_STRING, "I welcome comments, criticism, suggestions, and bug reports.  Many of the",
  649. X+         PANEL_LABEL_BOLD, FALSE,
  650. X+         NULL);
  651. X+     return obj;
  652. X+ }
  653. X+ 
  654. X+ /*
  655. X+  * Create object `msg_12' in the specified instance.
  656. X+ 
  657. X+  */
  658. X+ Xv_opaque
  659. X+ boss_about_msg_12_create(ip, owner)
  660. X+     caddr_t        ip;
  661. X+     Xv_opaque    owner;
  662. X+ {
  663. X+     Xv_opaque    obj;
  664. X+     
  665. X+     obj = xv_create(owner, PANEL_MESSAGE,
  666. X+         XV_KEY_DATA, INSTANCE, ip,
  667. X+         XV_HELP_DATA, "boss:msg_12",
  668. X+         XV_X, 14,
  669. X+         XV_Y, 158,
  670. X+         XV_WIDTH, 457,
  671. X+         XV_HEIGHT, 13,
  672. X+         PANEL_LABEL_STRING, "features in this version of boss were added as the result of a user request. ",
  673. X+         PANEL_LABEL_BOLD, FALSE,
  674. X+         NULL);
  675. X+     return obj;
  676. X+ }
  677. X+ 
  678. X+ /*
  679. X+  * Create object `msg_13' in the specified instance.
  680. X+ 
  681. X+  */
  682. X+ Xv_opaque
  683. X+ boss_about_msg_13_create(ip, owner)
  684. X+     caddr_t        ip;
  685. X+     Xv_opaque    owner;
  686. X+ {
  687. X+     Xv_opaque    obj;
  688. X+     
  689. X+     obj = xv_create(owner, PANEL_MESSAGE,
  690. X+         XV_KEY_DATA, INSTANCE, ip,
  691. X+         XV_HELP_DATA, "boss:msg_13",
  692. X+         XV_X, 14,
  693. X+         XV_Y, 174,
  694. X+         XV_WIDTH, 467,
  695. X+         XV_HEIGHT, 13,
  696. X+         PANEL_LABEL_STRING, "User feedback is the single best driving force in the evolution of my tools.  I ",
  697. X+         PANEL_LABEL_BOLD, FALSE,
  698. X+         NULL);
  699. X+     return obj;
  700. X+ }
  701. X+ 
  702. X+ /*
  703. X+  * Create object `msg_14' in the specified instance.
  704. X+ 
  705. X+  */
  706. X+ Xv_opaque
  707. X+ boss_about_msg_14_create(ip, owner)
  708. X+     caddr_t        ip;
  709. X+     Xv_opaque    owner;
  710. X+ {
  711. X+     Xv_opaque    obj;
  712. X+     
  713. X+     obj = xv_create(owner, PANEL_MESSAGE,
  714. X+         XV_KEY_DATA, INSTANCE, ip,
  715. X+         XV_HELP_DATA, "boss:msg_14",
  716. X+         XV_X, 14,
  717. X+         XV_Y, 190,
  718. X+         XV_WIDTH, 205,
  719. X+         XV_HEIGHT, 13,
  720. X+         PANEL_LABEL_STRING, "look forward to hearing from you!",
  721. X+         PANEL_LABEL_BOLD, FALSE,
  722. X+         NULL);
  723. X+     return obj;
  724. X+ }
  725. X+ 
  726. X+ /*
  727. X+  * Create object `msg_16' in the specified instance.
  728. X+ 
  729. X+  */
  730. X+ Xv_opaque
  731. X+ boss_about_msg_16_create(ip, owner)
  732. X+     caddr_t        ip;
  733. X+     Xv_opaque    owner;
  734. X+ {
  735. X+     Xv_opaque    obj;
  736. X+     
  737. X+     obj = xv_create(owner, PANEL_MESSAGE,
  738. X+         XV_KEY_DATA, INSTANCE, ip,
  739. X+         XV_HELP_DATA, "boss:msg_16",
  740. X+         XV_X, 14,
  741. X+         XV_Y, 222,
  742. X+         XV_WIDTH, 460,
  743. X+         XV_HEIGHT, 13,
  744. X+         PANEL_LABEL_STRING, "Boss has been placed in the public domain, but the copyright on the source",
  745. X+         PANEL_LABEL_BOLD, FALSE,
  746. X+         NULL);
  747. X+     return obj;
  748. X+ }
  749. X+ 
  750. X+ /*
  751. X+  * Create object `msg_17' in the specified instance.
  752. X+ 
  753. X+  */
  754. X+ Xv_opaque
  755. X+ boss_about_msg_17_create(ip, owner)
  756. X+     caddr_t        ip;
  757. X+     Xv_opaque    owner;
  758. X+ {
  759. X+     Xv_opaque    obj;
  760. X+     
  761. X+     obj = xv_create(owner, PANEL_MESSAGE,
  762. X+         XV_KEY_DATA, INSTANCE, ip,
  763. X+         XV_HELP_DATA, "boss:msg_17",
  764. X+         XV_X, 14,
  765. X+         XV_Y, 238,
  766. X+         XV_WIDTH, 472,
  767. X+         XV_HEIGHT, 13,
  768. X+         PANEL_LABEL_STRING, "code is retained by myself and Harris Corporation, my employer.  This means",
  769. X+         PANEL_LABEL_BOLD, FALSE,
  770. X+         NULL);
  771. X+     return obj;
  772. X+ }
  773. X+ 
  774. X+ /*
  775. X+  * Create object `msg_18' in the specified instance.
  776. X+ 
  777. X+  */
  778. X+ Xv_opaque
  779. X+ boss_about_msg_18_create(ip, owner)
  780. X+     caddr_t        ip;
  781. X+     Xv_opaque    owner;
  782. X+ {
  783. X+     Xv_opaque    obj;
  784. X+     
  785. X+     obj = xv_create(owner, PANEL_MESSAGE,
  786. X+         XV_KEY_DATA, INSTANCE, ip,
  787. X+         XV_HELP_DATA, "boss:msg_18",
  788. X+         XV_X, 14,
  789. X+         XV_Y, 254,
  790. X+         XV_WIDTH, 460,
  791. X+         XV_HEIGHT, 13,
  792. X+         PANEL_LABEL_STRING, "that you can give the source code to anyone but you cannot sell any part of",
  793. X+         PANEL_LABEL_BOLD, FALSE,
  794. X+         NULL);
  795. X+     return obj;
  796. X+ }
  797. X+ 
  798. X+ /*
  799. X+  * Create object `msg_19' in the specified instance.
  800. X+ 
  801. X+  */
  802. X+ Xv_opaque
  803. X+ boss_about_msg_19_create(ip, owner)
  804. X+     caddr_t        ip;
  805. X+     Xv_opaque    owner;
  806. X+ {
  807. X+     Xv_opaque    obj;
  808. X+     
  809. X+     obj = xv_create(owner, PANEL_MESSAGE,
  810. X+         XV_KEY_DATA, INSTANCE, ip,
  811. X+         XV_HELP_DATA, "boss:msg_19",
  812. X+         XV_X, 14,
  813. X+         XV_Y, 270,
  814. X+         XV_WIDTH, 455,
  815. X+         XV_HEIGHT, 13,
  816. X+         PANEL_LABEL_STRING, "the source code, nor can you incorporate any part of the source code into a",
  817. X+         PANEL_LABEL_BOLD, FALSE,
  818. X+         NULL);
  819. X+     return obj;
  820. X+ }
  821. X+ 
  822. X+ /*
  823. X+  * Create object `msg_20' in the specified instance.
  824. X+ 
  825. X+  */
  826. X+ Xv_opaque
  827. X+ boss_about_msg_20_create(ip, owner)
  828. X+     caddr_t        ip;
  829. X+     Xv_opaque    owner;
  830. X+ {
  831. X+     Xv_opaque    obj;
  832. X+     
  833. X+     obj = xv_create(owner, PANEL_MESSAGE,
  834. X+         XV_KEY_DATA, INSTANCE, ip,
  835. X+         XV_HELP_DATA, "boss:msg_20",
  836. X+         XV_X, 14,
  837. X+         XV_Y, 286,
  838. X+         XV_WIDTH, 476,
  839. X+         XV_HEIGHT, 13,
  840. X+         PANEL_LABEL_STRING, "product which is subsequently sold.  In addition, certain portions of this code ",
  841. X+         PANEL_LABEL_BOLD, FALSE,
  842. X+         NULL);
  843. X+     return obj;
  844. X+ }
  845. X+ 
  846. X+ /*
  847. X+  * Create object `message6' in the specified instance.
  848. X+ 
  849. X+  */
  850. X+ Xv_opaque
  851. X+ boss_about_message6_create(ip, owner)
  852. X+     caddr_t        ip;
  853. X+     Xv_opaque    owner;
  854. X+ {
  855. X+     Xv_opaque    obj;
  856. X+     
  857. X+     obj = xv_create(owner, PANEL_MESSAGE,
  858. X+         XV_KEY_DATA, INSTANCE, ip,
  859. X+         XV_X, 14,
  860. X+         XV_Y, 302,
  861. X+         XV_WIDTH, 442,
  862. X+         XV_HEIGHT, 13,
  863. X+         PANEL_LABEL_STRING, "contain information proprietary to Casio Corporation and cannot be sold",
  864. X+         PANEL_LABEL_BOLD, FALSE,
  865. X+         NULL);
  866. X+     return obj;
  867. X+ }
  868. X+ 
  869. X+ /*
  870. X+  * Create object `message7' in the specified instance.
  871. X+ 
  872. X+  */
  873. X+ Xv_opaque
  874. X+ boss_about_message7_create(ip, owner)
  875. X+     caddr_t        ip;
  876. X+     Xv_opaque    owner;
  877. X+ {
  878. X+     Xv_opaque    obj;
  879. X+     
  880. X+     obj = xv_create(owner, PANEL_MESSAGE,
  881. X+         XV_KEY_DATA, INSTANCE, ip,
  882. X+         XV_X, 14,
  883. X+         XV_Y, 318,
  884. X+         XV_WIDTH, 317,
  885. X+         XV_HEIGHT, 13,
  886. X+         PANEL_LABEL_STRING, "without explicit permission from Casio Corporation.",
  887. X+         PANEL_LABEL_BOLD, FALSE,
  888. X+         NULL);
  889. X+     return obj;
  890. X+ }
  891. X+ 
  892. X+ /*
  893. X+  * Create object `send_mail' in the specified instance.
  894. X+ 
  895. X+  */
  896. X+ Xv_opaque
  897. X+ boss_about_send_mail_create(ip, owner)
  898. X+     caddr_t        ip;
  899. X+     Xv_opaque    owner;
  900. X+ {
  901. X+     extern void        popup_send_mail();
  902. X+     Xv_opaque    obj;
  903. X+     
  904. X+     obj = xv_create(owner, PANEL_BUTTON,
  905. X+         XV_KEY_DATA, INSTANCE, ip,
  906. X+         XV_HELP_DATA, "boss:send_mail",
  907. X+         XV_X, 215,
  908. X+         XV_Y, 352,
  909. X+         XV_WIDTH, 78,
  910. X+         XV_HEIGHT, 20,
  911. X+         PANEL_LABEL_STRING, "Send Mail",
  912. X+         PANEL_NOTIFY_PROC, popup_send_mail,
  913. X+         NULL);
  914. X+     return obj;
  915. X+ }
  916. X+ 
  917. X+ /*
  918. X+  * Initialize an instance of object `mail'.
  919. X+  */
  920. X+ boss_mail_objects *
  921. X+ boss_mail_objects_initialize(ip, owner)
  922. X+     boss_mail_objects    *ip;
  923. X+     Xv_opaque    owner;
  924. X+ {
  925. X+     if (!ip && !(ip = (boss_mail_objects *) calloc(1, sizeof (boss_mail_objects))))
  926. X+         return (boss_mail_objects *) NULL;
  927. X+     if (!ip->mail)
  928. X+         ip->mail = boss_mail_mail_create(ip, owner);
  929. X+     if (!ip->mail_controls)
  930. X+         ip->mail_controls = boss_mail_mail_controls_create(ip, ip->mail);
  931. X+     if (!ip->msg_21)
  932. X+         ip->msg_21 = boss_mail_msg_21_create(ip, ip->mail_controls);
  933. X+     if (!ip->msg_22)
  934. X+         ip->msg_22 = boss_mail_msg_22_create(ip, ip->mail_controls);
  935. X+     if (!ip->address)
  936. X+         ip->address = boss_mail_address_create(ip, ip->mail_controls);
  937. X+     if (!ip->other_address)
  938. X+         ip->other_address = boss_mail_other_address_create(ip, ip->mail_controls);
  939. X+     if (!ip->message)
  940. X+         ip->message = boss_mail_message_create(ip, ip->mail);
  941. X+     if (!ip->mail_controls1)
  942. X+         ip->mail_controls1 = boss_mail_mail_controls1_create(ip, ip->mail);
  943. X+     if (!ip->accept_send)
  944. X+         ip->accept_send = boss_mail_accept_send_create(ip, ip->mail_controls1);
  945. X+     if (!ip->cancel_mail)
  946. X+         ip->cancel_mail = boss_mail_cancel_mail_create(ip, ip->mail_controls1);
  947. X+     return ip;
  948. X+ }
  949. X+ 
  950. X+ /*
  951. X+  * Create object `mail' in the specified instance.
  952. X+ 
  953. X+  */
  954. X+ Xv_opaque
  955. X+ boss_mail_mail_create(ip, owner)
  956. X+     caddr_t        ip;
  957. X+     Xv_opaque    owner;
  958. X+ {
  959. X+     extern void    done_mail();
  960. X+     Xv_opaque    obj;
  961. X+     
  962. X+     obj = xv_create(owner, FRAME_CMD,
  963. X+         XV_KEY_DATA, INSTANCE, ip,
  964. X+         XV_WIDTH, 506,
  965. X+         XV_HEIGHT, 338,
  966. X+         XV_LABEL, "Boss: Send mail",
  967. X+         XV_SHOW, FALSE,
  968. X+         FRAME_SHOW_FOOTER, FALSE,
  969. X+         FRAME_SHOW_RESIZE_CORNER, FALSE,
  970. X+         FRAME_CMD_PUSHPIN_IN, FALSE,
  971. X+         FRAME_DONE_PROC, done_mail,
  972. X+         NULL);
  973. X+     xv_set(xv_get(obj, FRAME_CMD_PANEL), WIN_SHOW, FALSE, NULL);
  974. X+     return obj;
  975. X+ }
  976. X+ 
  977. X+ /*
  978. X+  * Create object `mail_controls' in the specified instance.
  979. X+ 
  980. X+  */
  981. X+ Xv_opaque
  982. X+ boss_mail_mail_controls_create(ip, owner)
  983. X+     caddr_t        ip;
  984. X+     Xv_opaque    owner;
  985. X+ {
  986. X+     Xv_opaque    obj;
  987. X+     
  988. X+     obj = xv_create(owner, PANEL,
  989. X+         XV_KEY_DATA, INSTANCE, ip,
  990. X+         XV_HELP_DATA, "boss:mail_controls",
  991. X+         XV_X, 0,
  992. X+         XV_Y, 0,
  993. X+         XV_WIDTH, WIN_EXTEND_TO_EDGE,
  994. X+         XV_HEIGHT, 92,
  995. X+         WIN_BORDER, FALSE,
  996. X+         NULL);
  997. X+     return obj;
  998. X+ }
  999. X+ 
  1000. X+ /*
  1001. X+  * Create object `msg_21' in the specified instance.
  1002. X+ 
  1003. X+  */
  1004. X+ Xv_opaque
  1005. X+ boss_mail_msg_21_create(ip, owner)
  1006. X+     caddr_t        ip;
  1007. X+     Xv_opaque    owner;
  1008. X+ {
  1009. X+     Xv_opaque    obj;
  1010. X+     
  1011. X+     obj = xv_create(owner, PANEL_MESSAGE,
  1012. X+         XV_KEY_DATA, INSTANCE, ip,
  1013. X+         XV_HELP_DATA, "boss:msg_21",
  1014. X+         XV_X, 14,
  1015. X+         XV_Y, 14,
  1016. X+         XV_WIDTH, 478,
  1017. X+         XV_HEIGHT, 13,
  1018. X+         PANEL_LABEL_STRING, "Your feedback is appreciated.  To ensure that your message reaches me, check",
  1019. X+         PANEL_LABEL_BOLD, FALSE,
  1020. X+         NULL);
  1021. X+     return obj;
  1022. X+ }
  1023. X+ 
  1024. X+ /*
  1025. X+  * Create object `msg_22' in the specified instance.
  1026. X+ 
  1027. X+  */
  1028. X+ Xv_opaque
  1029. X+ boss_mail_msg_22_create(ip, owner)
  1030. X+     caddr_t        ip;
  1031. X+     Xv_opaque    owner;
  1032. X+ {
  1033. X+     Xv_opaque    obj;
  1034. X+     
  1035. X+     obj = xv_create(owner, PANEL_MESSAGE,
  1036. X+         XV_KEY_DATA, INSTANCE, ip,
  1037. X+         XV_HELP_DATA, "boss:msg_22",
  1038. X+         XV_X, 14,
  1039. X+         XV_Y, 30,
  1040. X+         XV_WIDTH, 395,
  1041. X+         XV_HEIGHT, 13,
  1042. X+         PANEL_LABEL_STRING, "that the \"To\" address is valid for your site before clicking \"Send\".",
  1043. X+         PANEL_LABEL_BOLD, FALSE,
  1044. X+         NULL);
  1045. X+     return obj;
  1046. X+ }
  1047. X+ 
  1048. X+ /*
  1049. X+  * Create object `address' in the specified instance.
  1050. X+ 
  1051. X+  */
  1052. X+ Xv_opaque
  1053. X+ boss_mail_address_create(ip, owner)
  1054. X+     caddr_t        ip;
  1055. X+     Xv_opaque    owner;
  1056. X+ {
  1057. X+     extern int        handle_address();
  1058. X+     Xv_opaque    obj;
  1059. X+     
  1060. X+     obj = xv_create(owner, PANEL_CHOICE, PANEL_DISPLAY_LEVEL, PANEL_CURRENT,
  1061. X+         XV_KEY_DATA, INSTANCE, ip,
  1062. X+         XV_HELP_DATA, "boss:address",
  1063. X+         XV_X, 14,
  1064. X+         XV_Y, 64,
  1065. X+         XV_WIDTH, 278,
  1066. X+         XV_HEIGHT, 23,
  1067. X+         PANEL_VALUE_X, 43,
  1068. X+         PANEL_VALUE_Y, 64,
  1069. X+         PANEL_LAYOUT, PANEL_HORIZONTAL,
  1070. X+         PANEL_CHOICE_NROWS, 1,
  1071. X+         PANEL_LABEL_STRING, "To:",
  1072. X+         PANEL_NOTIFY_PROC, handle_address,
  1073. X+         PANEL_CHOICE_STRINGS,
  1074. X+             "chuck@trantor.harris-atd.com",
  1075. X+             "uunet!trantor.harris-atd.com!chuck",
  1076. X+             "Other:",
  1077. X+             0,
  1078. X+         NULL);
  1079. X+     return obj;
  1080. X+ }
  1081. X+ 
  1082. X+ /*
  1083. X+  * Create object `other_address' in the specified instance.
  1084. X+ 
  1085. X+  */
  1086. X+ Xv_opaque
  1087. X+ boss_mail_other_address_create(ip, owner)
  1088. X+     caddr_t        ip;
  1089. X+     Xv_opaque    owner;
  1090. X+ {
  1091. X+     Xv_opaque    obj;
  1092. X+     
  1093. X+     obj = xv_create(owner, PANEL_TEXT,
  1094. X+         XV_KEY_DATA, INSTANCE, ip,
  1095. X+         XV_HELP_DATA, "boss:other_address",
  1096. X+         XV_X, 105,
  1097. X+         XV_Y, 69,
  1098. X+         XV_WIDTH, 385,
  1099. X+         XV_HEIGHT, 15,
  1100. X+         PANEL_VALUE_X, 114,
  1101. X+         PANEL_VALUE_Y, 69,
  1102. X+         PANEL_LAYOUT, PANEL_HORIZONTAL,
  1103. X+         PANEL_VALUE_DISPLAY_LENGTH, 47,
  1104. X+         PANEL_VALUE_STORED_LENGTH, 256,
  1105. X+         PANEL_READ_ONLY, FALSE,
  1106. X+         NULL);
  1107. X+     return obj;
  1108. X+ }
  1109. X+ 
  1110. X+ /*
  1111. X+  * Create object `message' in the specified instance.
  1112. X+ 
  1113. X+  */
  1114. X+ Xv_opaque
  1115. X+ boss_mail_message_create(ip, owner)
  1116. X+     caddr_t        ip;
  1117. X+     Xv_opaque    owner;
  1118. X+ {
  1119. X+     Xv_opaque    obj;
  1120. X+     
  1121. X+     obj = xv_create(owner, TEXTSW,
  1122. X+         XV_KEY_DATA, INSTANCE, ip,
  1123. X+         XV_X, 0,
  1124. X+         XV_Y, 92,
  1125. X+         XV_WIDTH, WIN_EXTEND_TO_EDGE,
  1126. X+         XV_HEIGHT, 188,
  1127. X+         OPENWIN_SHOW_BORDERS, TRUE,
  1128. X+         NULL);
  1129. X+     return obj;
  1130. X+ }
  1131. X+ 
  1132. X+ /*
  1133. X+  * Create object `mail_controls1' in the specified instance.
  1134. X+ 
  1135. X+  */
  1136. X+ Xv_opaque
  1137. X+ boss_mail_mail_controls1_create(ip, owner)
  1138. X+     caddr_t        ip;
  1139. X+     Xv_opaque    owner;
  1140. X+ {
  1141. X+     Xv_opaque    obj;
  1142. X+     
  1143. X+     obj = xv_create(owner, PANEL,
  1144. X+         XV_KEY_DATA, INSTANCE, ip,
  1145. X+         XV_HELP_DATA, "boss:mail_controls1",
  1146. X+         XV_X, 0,
  1147. X+         XV_Y, 280,
  1148. X+         XV_WIDTH, WIN_EXTEND_TO_EDGE,
  1149. X+         XV_HEIGHT, WIN_EXTEND_TO_EDGE,
  1150. X+         WIN_BORDER, FALSE,
  1151. X+         NULL);
  1152. X+     return obj;
  1153. X+ }
  1154. X+ 
  1155. X+ /*
  1156. X+  * Create object `accept_send' in the specified instance.
  1157. X+ 
  1158. X+  */
  1159. X+ Xv_opaque
  1160. X+ boss_mail_accept_send_create(ip, owner)
  1161. X+     caddr_t        ip;
  1162. X+     Xv_opaque    owner;
  1163. X+ {
  1164. X+     extern void        send_mail();
  1165. X+     Xv_opaque    obj;
  1166. X+     
  1167. X+     obj = xv_create(owner, PANEL_BUTTON,
  1168. X+         XV_KEY_DATA, INSTANCE, ip,
  1169. X+         XV_HELP_DATA, "boss:accept_send",
  1170. X+         XV_X, 193,
  1171. X+         XV_Y, 18,
  1172. X+         XV_WIDTH, 48,
  1173. X+         XV_HEIGHT, 20,
  1174. X+         PANEL_LABEL_STRING, "Send",
  1175. X+         PANEL_NOTIFY_PROC, send_mail,
  1176. X+         NULL);
  1177. X+     return obj;
  1178. X+ }
  1179. X+ 
  1180. X+ /*
  1181. X+  * Create object `cancel_mail' in the specified instance.
  1182. X+ 
  1183. X+  */
  1184. X+ Xv_opaque
  1185. X+ boss_mail_cancel_mail_create(ip, owner)
  1186. X+     caddr_t        ip;
  1187. X+     Xv_opaque    owner;
  1188. X+ {
  1189. X+     extern void        cancel_mail();
  1190. X+     Xv_opaque    obj;
  1191. X+     
  1192. X+     obj = xv_create(owner, PANEL_BUTTON,
  1193. X+         XV_KEY_DATA, INSTANCE, ip,
  1194. X+         XV_HELP_DATA, "boss:cancel_mail",
  1195. X+         XV_X, 253,
  1196. X+         XV_Y, 18,
  1197. X+         XV_WIDTH, 59,
  1198. X+         XV_HEIGHT, 20,
  1199. X+         PANEL_LABEL_STRING, "Cancel",
  1200. X+         PANEL_NOTIFY_PROC, cancel_mail,
  1201. X          NULL);
  1202. X      return obj;
  1203. X  }
  1204. X*** boss_ui.h.orig    Fri Nov 30 08:44:16 1990
  1205. X--- boss_ui.h    Fri Nov 30 08:15:29 1990
  1206. X***************
  1207. X*** 1,24 ****
  1208. X- /************************************************************************/
  1209. X- /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  1210. X- /*                                    */
  1211. X- /*    Permission to use, copy, modify, and distribute this software    */
  1212. X- /*    and its documentation for any purpose and without fee is    */
  1213. X- /*    hereby granted, provided that the above copyright notice    */
  1214. X- /*    appear in all copies and that both that copyright notice and    */
  1215. X- /*    this permission notice appear in supporting documentation, and    */
  1216. X- /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1217. X- /*    used in advertising or publicity pertaining to distribution    */
  1218. X- /*    of the software without specific, written prior permission.    */
  1219. X- /*    Chuck Musciano and Harris Corporation make no representations    */
  1220. X- /*    about the suitability of this software for any purpose.  It is    */
  1221. X- /*    provided "as is" without express or implied warranty.        */
  1222. X- /*                                    */
  1223. X- /*    This code contains data and information that is proprietary    */
  1224. X- /*    to Casio Corporation.  You may be subject to legal action if    */
  1225. X- /*    this information is released without explicit permission from    */
  1226. X- /*    Casio.                                */
  1227. X- /************************************************************************/
  1228. X- 
  1229. X  #ifndef    boss_HEADER
  1230. X  #define    boss_HEADER
  1231. X  
  1232. X--- 1,3 ----
  1233. X***************
  1234. X*** 159,162 ****
  1235. X--- 138,213 ----
  1236. X  extern Xv_opaque    boss_schedule_dialog_schedule_format_create();
  1237. X  extern Xv_opaque    boss_schedule_dialog_appt_file_create();
  1238. X  extern Xv_opaque    boss_schedule_dialog_schedule_accept_create();
  1239. X+ 
  1240. X+ typedef struct {
  1241. X+     Xv_opaque    about;
  1242. X+     Xv_opaque    about_controls;
  1243. X+     Xv_opaque    msg_1;
  1244. X+     Xv_opaque    msg_5;
  1245. X+     Xv_opaque    msg_6;
  1246. X+     Xv_opaque    msg_7;
  1247. X+     Xv_opaque    msg_8;
  1248. X+     Xv_opaque    msg_9;
  1249. X+     Xv_opaque    msg_11;
  1250. X+     Xv_opaque    msg_12;
  1251. X+     Xv_opaque    msg_13;
  1252. X+     Xv_opaque    msg_14;
  1253. X+     Xv_opaque    msg_16;
  1254. X+     Xv_opaque    msg_17;
  1255. X+     Xv_opaque    msg_18;
  1256. X+     Xv_opaque    msg_19;
  1257. X+     Xv_opaque    msg_20;
  1258. X+     Xv_opaque    message6;
  1259. X+     Xv_opaque    message7;
  1260. X+     Xv_opaque    send_mail;
  1261. X+ } boss_about_objects;
  1262. X+ 
  1263. X+ extern boss_about_objects    *boss_about_objects_initialize();
  1264. X+ 
  1265. X+ extern Xv_opaque    boss_about_about_create();
  1266. X+ extern Xv_opaque    boss_about_about_controls_create();
  1267. X+ extern Xv_opaque    boss_about_msg_1_create();
  1268. X+ extern Xv_opaque    boss_about_msg_5_create();
  1269. X+ extern Xv_opaque    boss_about_msg_6_create();
  1270. X+ extern Xv_opaque    boss_about_msg_7_create();
  1271. X+ extern Xv_opaque    boss_about_msg_8_create();
  1272. X+ extern Xv_opaque    boss_about_msg_9_create();
  1273. X+ extern Xv_opaque    boss_about_msg_11_create();
  1274. X+ extern Xv_opaque    boss_about_msg_12_create();
  1275. X+ extern Xv_opaque    boss_about_msg_13_create();
  1276. X+ extern Xv_opaque    boss_about_msg_14_create();
  1277. X+ extern Xv_opaque    boss_about_msg_16_create();
  1278. X+ extern Xv_opaque    boss_about_msg_17_create();
  1279. X+ extern Xv_opaque    boss_about_msg_18_create();
  1280. X+ extern Xv_opaque    boss_about_msg_19_create();
  1281. X+ extern Xv_opaque    boss_about_msg_20_create();
  1282. X+ extern Xv_opaque    boss_about_message6_create();
  1283. X+ extern Xv_opaque    boss_about_message7_create();
  1284. X+ extern Xv_opaque    boss_about_send_mail_create();
  1285. X+ 
  1286. X+ typedef struct {
  1287. X+     Xv_opaque    mail;
  1288. X+     Xv_opaque    mail_controls;
  1289. X+     Xv_opaque    msg_21;
  1290. X+     Xv_opaque    msg_22;
  1291. X+     Xv_opaque    address;
  1292. X+     Xv_opaque    other_address;
  1293. X+     Xv_opaque    message;
  1294. X+     Xv_opaque    mail_controls1;
  1295. X+     Xv_opaque    accept_send;
  1296. X+     Xv_opaque    cancel_mail;
  1297. X+ } boss_mail_objects;
  1298. X+ 
  1299. X+ extern boss_mail_objects    *boss_mail_objects_initialize();
  1300. X+ 
  1301. X+ extern Xv_opaque    boss_mail_mail_create();
  1302. X+ extern Xv_opaque    boss_mail_mail_controls_create();
  1303. X+ extern Xv_opaque    boss_mail_msg_21_create();
  1304. X+ extern Xv_opaque    boss_mail_msg_22_create();
  1305. X+ extern Xv_opaque    boss_mail_address_create();
  1306. X+ extern Xv_opaque    boss_mail_other_address_create();
  1307. X+ extern Xv_opaque    boss_mail_message_create();
  1308. X+ extern Xv_opaque    boss_mail_mail_controls1_create();
  1309. X+ extern Xv_opaque    boss_mail_accept_send_create();
  1310. X+ extern Xv_opaque    boss_mail_cancel_mail_create();
  1311. X  #endif
  1312. X*** busy.c.orig    Fri Nov 30 08:44:17 1990
  1313. X--- busy.c    Tue Oct 23 08:03:24 1990
  1314. X***************
  1315. X*** 0 ****
  1316. X--- 1,65 ----
  1317. X+ /************************************************************************/
  1318. X+ /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1319. X+ /*                                    */
  1320. X+ /*    Permission to use, copy, modify, and distribute this software    */
  1321. X+ /*    and its documentation for any purpose and without fee is    */
  1322. X+ /*    hereby granted, provided that the above copyright notice    */
  1323. X+ /*    appear in all copies and that both that copyright notice and    */
  1324. X+ /*    this permission notice appear in supporting documentation, and    */
  1325. X+ /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1326. X+ /*    used in advertising or publicity pertaining to distribution    */
  1327. X+ /*    of the software without specific, written prior permission.    */
  1328. X+ /*    Chuck Musciano and Harris Corporation make no representations    */
  1329. X+ /*    about the suitability of this software for any purpose.  It is    */
  1330. X+ /*    provided "as is" without express or implied warranty.  This     */
  1331. X+ /*    software may not be sold without the prior explicit permission    */
  1332. X+ /*    of Harris Corporation.                        */
  1333. X+ /************************************************************************/
  1334. X+ 
  1335. X+ /************************************************************************/
  1336. X+ /*                                    */
  1337. X+ /*    busy.c    turn frame busy attribute on and off            */
  1338. X+ /*                                    */
  1339. X+ /************************************************************************/
  1340. X+ 
  1341. X+ #include    <stdio.h>
  1342. X+ #include    <xview/xview.h>
  1343. X+ #include    <xview/panel.h>
  1344. X+ 
  1345. X+ #include    "manifest.h"
  1346. X+ 
  1347. X+ /************************************************************************/
  1348. X+ PRIVATE    set_busy(base, busy, skip)
  1349. X+ 
  1350. X+ Frame    base;
  1351. X+ int    busy;
  1352. X+ Frame    skip;
  1353. X+ 
  1354. X+ {    Frame    subframe;
  1355. X+     int    i;
  1356. X+ 
  1357. X+     for (i = 1; subframe = (Frame) xv_get(base, FRAME_NTH_SUBFRAME, i); i++)
  1358. X+        if (subframe != skip)
  1359. X+           if (xv_get(subframe, XV_SHOW))
  1360. X+              xv_set(subframe, FRAME_BUSY, busy, NULL);
  1361. X+     xv_set(base, FRAME_BUSY, busy, NULL);
  1362. X+ }
  1363. X+ 
  1364. X+ /************************************************************************/
  1365. X+ EXPORT    lets_get_busy(base, busy, skip)
  1366. X+ 
  1367. X+ Frame    base;
  1368. X+ int    busy;
  1369. X+ Frame    skip;
  1370. X+ 
  1371. X+ {    static    int    depth = 0;
  1372. X+ 
  1373. X+     if (busy) {
  1374. X+        if (depth == 0)
  1375. X+           set_busy(base, TRUE, skip);
  1376. X+        depth++;
  1377. X+        }
  1378. X+     else if (depth > 0)
  1379. X+        if (--depth == 0)
  1380. X+           set_busy(base, FALSE, NULL);
  1381. X+ }
  1382. X*** do_load.c.orig    Fri Nov 30 08:44:24 1990
  1383. X--- do_load.c    Wed Oct 24 08:18:56 1990
  1384. X***************
  1385. X*** 108,114 ****
  1386. X      FILE    *f;
  1387. X      object    *o, *obj;
  1388. X  
  1389. X!     lets_get_busy(TRUE, NULL);
  1390. X      xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1391. X  
  1392. X      if (((int) xv_get(dialog->source, PANEL_VALUE)) == FROM_BOSS) {
  1393. X--- 108,114 ----
  1394. X      FILE    *f;
  1395. X      object    *o, *obj;
  1396. X  
  1397. X!     lets_get_busy(boss_base->base, TRUE, NULL);
  1398. X      xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1399. X  
  1400. X      if (((int) xv_get(dialog->source, PANEL_VALUE)) == FROM_BOSS) {
  1401. X***************
  1402. X*** 166,170 ****
  1403. X         else
  1404. X            error("Could not read from %s", p);
  1405. X         }
  1406. X!     lets_get_busy(FALSE, NULL);
  1407. X  }
  1408. X--- 166,170 ----
  1409. X         else
  1410. X            error("Could not read from %s", p);
  1411. X         }
  1412. X!     lets_get_busy(boss_base->base, FALSE, NULL);
  1413. X  }
  1414. X*** do_schedule.c.orig    Fri Nov 30 08:44:26 1990
  1415. X--- do_schedule.c    Wed Oct 24 08:18:49 1990
  1416. X***************
  1417. X*** 223,233 ****
  1418. X  
  1419. X  {    int    result, format;
  1420. X  
  1421. X!     lets_get_busy(TRUE, NULL);
  1422. X      if ((format = (int) xv_get(dialog->schedule_format, PANEL_VALUE)) == CALENTOOL)
  1423. X         result = convert_to_calentool();
  1424. X      else if (format == CALENDAR_MANAGER)
  1425. X         result = convert_to_calendar_manager();
  1426. X      xv_set(item, PANEL_NOTIFY_STATUS, result, NULL);
  1427. X!     lets_get_busy(FALSE, NULL);
  1428. X  }
  1429. X--- 223,233 ----
  1430. X  
  1431. X  {    int    result, format;
  1432. X  
  1433. X!     lets_get_busy(boss_base->base, TRUE, NULL);
  1434. X      if ((format = (int) xv_get(dialog->schedule_format, PANEL_VALUE)) == CALENTOOL)
  1435. X         result = convert_to_calentool();
  1436. X      else if (format == CALENDAR_MANAGER)
  1437. X         result = convert_to_calendar_manager();
  1438. X      xv_set(item, PANEL_NOTIFY_STATUS, result, NULL);
  1439. X!     lets_get_busy(boss_base->base, FALSE, NULL);
  1440. X  }
  1441. X*** do_store.c.orig    Fri Nov 30 08:44:27 1990
  1442. X--- do_store.c    Fri Nov  2 10:04:49 1990
  1443. X***************
  1444. X*** 30,38 ****
  1445. X--- 30,40 ----
  1446. X  #include    <sys/types.h>
  1447. X  #include    <xview/xview.h>
  1448. X  #include    <xview/panel.h>
  1449. X+ #include    <xview/notice.h>
  1450. X  #include    "boss_ui.h"
  1451. X  
  1452. X  #include    "manifest.h"
  1453. X+ #include    "packet.h"
  1454. X  #include    "object.h"
  1455. X  #include    "globals.h"
  1456. X  
  1457. X***************
  1458. X*** 109,120 ****
  1459. X      object    *obj;
  1460. X      char    *path;
  1461. X  
  1462. X!     lets_get_busy(TRUE, NULL);
  1463. X      xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1464. X  
  1465. X      if ((which = (int) xv_get(dialog->store_data, PANEL_VALUE)) == 0)
  1466. X         xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1467. X      else if (((int) xv_get(dialog->dest, PANEL_VALUE)) == TO_BOSS) {
  1468. X         if (open_casio(port_file, baud_rate, parity)) {
  1469. X            if (start_session()) {
  1470. X               for (i = 0; i < MAX_OBJECT_KINDS; i++)
  1471. X--- 111,138 ----
  1472. X      object    *obj;
  1473. X      char    *path;
  1474. X  
  1475. X!     lets_get_busy(boss_base->base, TRUE, NULL);
  1476. X      xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1477. X  
  1478. X      if ((which = (int) xv_get(dialog->store_data, PANEL_VALUE)) == 0)
  1479. X         xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1480. X      else if (((int) xv_get(dialog->dest, PANEL_VALUE)) == TO_BOSS) {
  1481. X+        if (baud_rate == BAUD_9600) {
  1482. X+           i = notice_prompt(boss_base->base, NULL,
  1483. X+                                NOTICE_MESSAGE_STRINGS, "Storing data to the BOSS at 9600 baud is known",
  1484. X+                                               "to be unreliable.  You should reduce the baud",
  1485. X+                                                 "rate to 4800 or lower before proceeding.",
  1486. X+                                                 " ",
  1487. X+                                                 "Do you wish to continue?",
  1488. X+                                                 NULL,
  1489. X+                                NOTICE_BUTTON_YES, "Continue",
  1490. X+                                NOTICE_BUTTON_NO, "Cancel",
  1491. X+                             0);
  1492. X+           if (i == NOTICE_NO) {
  1493. X+              lets_get_busy(boss_base->base, FALSE, NULL);
  1494. X+              return;
  1495. X+              }
  1496. X+           }
  1497. X         if (open_casio(port_file, baud_rate, parity)) {
  1498. X            if (start_session()) {
  1499. X               for (i = 0; i < MAX_OBJECT_KINDS; i++)
  1500. X***************
  1501. X*** 160,164 ****
  1502. X            xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1503. X            }
  1504. X         }
  1505. X!     lets_get_busy(FALSE, NULL);
  1506. X  }
  1507. X--- 178,182 ----
  1508. X            xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1509. X            }
  1510. X         }
  1511. X!     lets_get_busy(boss_base->base, FALSE, NULL);
  1512. X  }
  1513. X*** expand.c.orig    Fri Nov 30 08:44:28 1990
  1514. X--- expand.c    Fri Jun  8 11:35:59 1990
  1515. X***************
  1516. X*** 1,5 ****
  1517. X  /************************************************************************/
  1518. X! /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  1519. X  /*                                    */
  1520. X  /*    Permission to use, copy, modify, and distribute this software    */
  1521. X  /*    and its documentation for any purpose and without fee is    */
  1522. X--- 1,5 ----
  1523. X  /************************************************************************/
  1524. X! /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1525. X  /*                                    */
  1526. X  /*    Permission to use, copy, modify, and distribute this software    */
  1527. X  /*    and its documentation for any purpose and without fee is    */
  1528. X***************
  1529. X*** 11,22 ****
  1530. X  /*    of the software without specific, written prior permission.    */
  1531. X  /*    Chuck Musciano and Harris Corporation make no representations    */
  1532. X  /*    about the suitability of this software for any purpose.  It is    */
  1533. X! /*    provided "as is" without express or implied warranty.        */
  1534. X! /*                                    */
  1535. X! /*    This code contains data and information that is proprietary    */
  1536. X! /*    to Casio Corporation.  You may be subject to legal action if    */
  1537. X! /*    this information is released without explicit permission from    */
  1538. X! /*    Casio.                                */
  1539. X  /************************************************************************/
  1540. X  
  1541. X  #include    <sys/types.h>
  1542. X--- 11,19 ----
  1543. X  /*    of the software without specific, written prior permission.    */
  1544. X  /*    Chuck Musciano and Harris Corporation make no representations    */
  1545. X  /*    about the suitability of this software for any purpose.  It is    */
  1546. X! /*    provided "as is" without express or implied warranty.  This     */
  1547. X! /*    software may not be sold without the prior explicit permission    */
  1548. X! /*    of Harris Corporation.                        */
  1549. X  /************************************************************************/
  1550. X  
  1551. X  #include    <sys/types.h>
  1552. X*** filename_completion.c.orig    Fri Nov 30 08:44:28 1990
  1553. X--- filename_completion.c    Tue Oct 23 08:20:50 1990
  1554. X***************
  1555. X*** 0 ****
  1556. X--- 1,52 ----
  1557. X+ /************************************************************************/
  1558. X+ /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1559. X+ /*                                    */
  1560. X+ /*    Permission to use, copy, modify, and distribute this software    */
  1561. X+ /*    and its documentation for any purpose and without fee is    */
  1562. X+ /*    hereby granted, provided that the above copyright notice    */
  1563. X+ /*    appear in all copies and that both that copyright notice and    */
  1564. X+ /*    this permission notice appear in supporting documentation, and    */
  1565. X+ /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1566. X+ /*    used in advertising or publicity pertaining to distribution    */
  1567. X+ /*    of the software without specific, written prior permission.    */
  1568. X+ /*    Chuck Musciano and Harris Corporation make no representations    */
  1569. X+ /*    about the suitability of this software for any purpose.  It is    */
  1570. X+ /*    provided "as is" without express or implied warranty.  This     */
  1571. X+ /*    software may not be sold without the prior explicit permission    */
  1572. X+ /*    of Harris Corporation.                        */
  1573. X+ /************************************************************************/
  1574. X+ 
  1575. X+ /************************************************************************/
  1576. X+ /*                                    */
  1577. X+ /*    filename_completion.c    completion handler for text items    */
  1578. X+ /*                                    */
  1579. X+ /************************************************************************/
  1580. X+ 
  1581. X+ #include    <stdio.h>
  1582. X+ #include    <sys/param.h>
  1583. X+ #include    <sys/types.h>
  1584. X+ #include    <xview/xview.h>
  1585. X+ #include    <xview/panel.h>
  1586. X+ 
  1587. X+ #include    "manifest.h"
  1588. X+ 
  1589. X+ /************************************************************************/
  1590. X+ EXPORT    Panel_setting    filename_completion(item, event)
  1591. X+ 
  1592. X+ Panel_item    item;
  1593. X+ Event        *event;
  1594. X+ 
  1595. X+ {    char    *p, *expand_filename();
  1596. X+ 
  1597. X+     switch (event_action(event)) {
  1598. X+        case '\n' :
  1599. X+        case '\r' :
  1600. X+        case ' '  : if ((p = expand_filename((char *) xv_get(item, PANEL_VALUE))) == NULL)
  1601. X+                  window_bell(xv_get(item, XV_OWNER));
  1602. X+                   else
  1603. X+                      xv_set(item, PANEL_VALUE, p, 0);
  1604. X+                   return(PANEL_NONE);
  1605. X+        case '\t' : return(event_shift_is_down(event)? PANEL_PREVIOUS : PANEL_NEXT);
  1606. X+        default   : return(panel_text_notify(item, event));
  1607. X+        }
  1608. X+ }
  1609. X*** list_misc.c.orig    Fri Nov 30 08:44:31 1990
  1610. X--- list_misc.c    Fri Nov  9 11:11:30 1990
  1611. X***************
  1612. X*** 0 ****
  1613. X--- 1,85 ----
  1614. X+ /************************************************************************/
  1615. X+ /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1616. X+ /*                                    */
  1617. X+ /*    Permission to use, copy, modify, and distribute this software    */
  1618. X+ /*    and its documentation for any purpose and without fee is    */
  1619. X+ /*    hereby granted, provided that the above copyright notice    */
  1620. X+ /*    appear in all copies and that both that copyright notice and    */
  1621. X+ /*    this permission notice appear in supporting documentation, and    */
  1622. X+ /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1623. X+ /*    used in advertising or publicity pertaining to distribution    */
  1624. X+ /*    of the software without specific, written prior permission.    */
  1625. X+ /*    Chuck Musciano and Harris Corporation make no representations    */
  1626. X+ /*    about the suitability of this software for any purpose.  It is    */
  1627. X+ /*    provided "as is" without express or implied warranty.  This     */
  1628. X+ /*    software may not be sold without the prior explicit permission    */
  1629. X+ /*    of Harris Corporation.                        */
  1630. X+ /************************************************************************/
  1631. X+ 
  1632. X+ /************************************************************************/
  1633. X+ /*                                    */
  1634. X+ /*    list_utils.c    other tools for manipulating panel settings    */
  1635. X+ /*                                    */
  1636. X+ /************************************************************************/
  1637. X+ 
  1638. X+ #include    <stdio.h>
  1639. X+ #include    <sys/param.h>
  1640. X+ #include    <sys/types.h>
  1641. X+ #include    <xview/xview.h>
  1642. X+ #include    <xview/panel.h>
  1643. X+ 
  1644. X+ #include    "manifest.h"
  1645. X+ 
  1646. X+ /************************************************************************/
  1647. X+ EXPORT    int    list_count(item)
  1648. X+ 
  1649. X+ Panel_item    item;
  1650. X+ 
  1651. X+ {    int    i, count, rows;
  1652. X+ 
  1653. X+     rows = (int) xv_get(item, PANEL_LIST_NROWS);
  1654. X+     for (i = count = 0; i < rows; i++)
  1655. X+        if (xv_get(item, PANEL_LIST_SELECTED, i))
  1656. X+           count++;
  1657. X+     return(count);
  1658. X+ }
  1659. X+ 
  1660. X+ /************************************************************************/
  1661. X+ EXPORT    empty_list(item)
  1662. X+ 
  1663. X+ Panel_item    item;
  1664. X+ 
  1665. X+ {    int    row;
  1666. X+ 
  1667. X+     row = (int) xv_get(item, PANEL_LIST_NROWS);
  1668. X+     for ( ; row > 0; row--)
  1669. X+        xv_set(item, PANEL_LIST_DELETE, row - 1, NULL);
  1670. X+ }
  1671. X+ 
  1672. X+ /************************************************************************/
  1673. X+ EXPORT    clear_list(item)
  1674. X+ 
  1675. X+ Panel_item    item;
  1676. X+ 
  1677. X+ {    int    i, row;
  1678. X+ 
  1679. X+     row = (int) xv_get(item, PANEL_LIST_NROWS);
  1680. X+     for (i = 0; i < row; i++)
  1681. X+        if (xv_get(item, PANEL_LIST_SELECTED, i))
  1682. X+           xv_set(item, PANEL_LIST_SELECT, i, FALSE, NULL);
  1683. X+ }
  1684. X+ 
  1685. X+ /************************************************************************/
  1686. X+ EXPORT    int    first_selected(item)
  1687. X+ 
  1688. X+ Panel_item    item;
  1689. X+ 
  1690. X+ {    int    i, row;
  1691. X+ 
  1692. X+     row = (int) xv_get(item, PANEL_LIST_NROWS);
  1693. X+     for (i = 0; i < row; i++)
  1694. X+        if (xv_get(item, PANEL_LIST_SELECTED, i))
  1695. X+           return(i);
  1696. X+     return(0);
  1697. X+ }
  1698. X+        
  1699. X*** misc.c.orig    Fri Nov 30 08:44:33 1990
  1700. X--- misc.c    Fri Nov  2 07:34:57 1990
  1701. X***************
  1702. X*** 204,206 ****
  1703. X--- 204,220 ----
  1704. X         }
  1705. X      return(c);
  1706. X  }
  1707. X+ 
  1708. X+ /************************************************************************/
  1709. X+ EXPORT    int    is_empty(s)
  1710. X+ 
  1711. X+ char    *s;
  1712. X+ 
  1713. X+ {
  1714. X+     if (s == NULL)
  1715. X+        return(TRUE);
  1716. X+     for (; *s; s++)
  1717. X+        if (!isspace(*s))
  1718. X+           return(FALSE); 
  1719. X+     return(TRUE);
  1720. X+ }
  1721. X*** patchlevel.h.orig    Fri Nov 30 08:44:38 1990
  1722. X--- patchlevel.h    Fri Nov 30 08:12:35 1990
  1723. X***************
  1724. X*** 22,26 ****
  1725. X--- 22,32 ----
  1726. X  /************************************************************************/
  1727. X  /*                                    */
  1728. X  /*    0    15 Oct 90    Initial release                */
  1729. X+ /*                comp.sources.x: Volume 10, Issues 3-8    */
  1730. X+ /*                                    */
  1731. X+ /*    1     1 Dec 90    Restructured code for maintainability    */
  1732. X+ /*                Added "About Boss..."            */
  1733. X+ /*                Added warning about downloads at 9600    */
  1734. X+ /*                   baud                    */
  1735. X  /*                                    */
  1736. X  /************************************************************************/
  1737. X*** pinned_menu_notify.c.orig    Fri Nov 30 08:44:39 1990
  1738. X--- pinned_menu_notify.c    Tue Oct 23 08:03:27 1990
  1739. X***************
  1740. X*** 0 ****
  1741. X--- 1,52 ----
  1742. X+ /************************************************************************/
  1743. X+ /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1744. X+ /*                                    */
  1745. X+ /*    Permission to use, copy, modify, and distribute this software    */
  1746. X+ /*    and its documentation for any purpose and without fee is    */
  1747. X+ /*    hereby granted, provided that the above copyright notice    */
  1748. X+ /*    appear in all copies and that both that copyright notice and    */
  1749. X+ /*    this permission notice appear in supporting documentation, and    */
  1750. X+ /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1751. X+ /*    used in advertising or publicity pertaining to distribution    */
  1752. X+ /*    of the software without specific, written prior permission.    */
  1753. X+ /*    Chuck Musciano and Harris Corporation make no representations    */
  1754. X+ /*    about the suitability of this software for any purpose.  It is    */
  1755. X+ /*    provided "as is" without express or implied warranty.  This     */
  1756. X+ /*    software may not be sold without the prior explicit permission    */
  1757. X+ /*    of Harris Corporation.                        */
  1758. X+ /************************************************************************/
  1759. X+ 
  1760. X+ /************************************************************************/
  1761. X+ /*                                    */
  1762. X+ /*    pinned_menu_notify.c    GUIDE callback for pinned menus        */
  1763. X+ /*                                    */
  1764. X+ /************************************************************************/
  1765. X+ 
  1766. X+ #include    <stdio.h>
  1767. X+ #include    <sys/param.h>
  1768. X+ #include    <sys/types.h>
  1769. X+ #include    <xview/xview.h>
  1770. X+ 
  1771. X+ #include    "manifest.h"
  1772. X+ 
  1773. X+ /************************************************************************/
  1774. X+ EXPORT    void    pinned_menu_notify(menu, item)
  1775. X+ 
  1776. X+ Menu        menu;
  1777. X+ Menu_item    item;
  1778. X+ 
  1779. X+ {    Xv_opaque    pin_window     = (Xv_opaque) xv_get(menu, MENU_PIN_WINDOW);
  1780. X+     void        (*menu_notify)() = (void (*)()) xv_get(menu, MENU_GEN_PROC);
  1781. X+     void        (*item_notify)() = (void (*)()) xv_get(item, MENU_GEN_PROC);
  1782. X+     
  1783. X+     if (pin_window && xv_get(pin_window, XV_SHOW)) {
  1784. X+        if (menu_notify)
  1785. X+           (*menu_notify)(menu, MENU_NOTIFY);
  1786. X+        if (item_notify)
  1787. X+           (*item_notify)(item, MENU_NOTIFY);
  1788. X+        if (item_notify)
  1789. X+           (*item_notify)(item, MENU_NOTIFY_DONE);
  1790. X+        if (menu_notify)
  1791. X+           (*menu_notify)(menu, MENU_NOTIFY_DONE);
  1792. X+     }
  1793. X+ }
  1794. X*** place_dialog.c.orig    Fri Nov 30 08:44:40 1990
  1795. X--- place_dialog.c    Thu Nov 29 15:18:03 1990
  1796. X***************
  1797. X*** 0 ****
  1798. X--- 1,69 ----
  1799. X+ /************************************************************************/
  1800. X+ /*    Copyright 1988-1990 by Chuck Musciano and Harris Corporation    */
  1801. X+ /*                                    */
  1802. X+ /*    Permission to use, copy, modify, and distribute this software    */
  1803. X+ /*    and its documentation for any purpose and without fee is    */
  1804. X+ /*    hereby granted, provided that the above copyright notice    */
  1805. X+ /*    appear in all copies and that both that copyright notice and    */
  1806. X+ /*    this permission notice appear in supporting documentation, and    */
  1807. X+ /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1808. X+ /*    used in advertising or publicity pertaining to distribution    */
  1809. X+ /*    of the software without specific, written prior permission.    */
  1810. X+ /*    Chuck Musciano and Harris Corporation make no representations    */
  1811. X+ /*    about the suitability of this software for any purpose.  It is    */
  1812. X+ /*    provided "as is" without express or implied warranty.  This     */
  1813. X+ /*    software may not be sold without the prior explicit permission    */
  1814. X+ /*    of Harris Corporation.                        */
  1815. X+ /************************************************************************/
  1816. X+ 
  1817. X+ /************************************************************************/
  1818. X+ /*                                    */
  1819. X+ /*    place_dialog.c    position a dialog box at the right place    */
  1820. X+ /*                                    */
  1821. X+ /************************************************************************/
  1822. X+ 
  1823. X+ #include    <stdio.h>
  1824. X+ #include    <sys/param.h>
  1825. X+ #include    <sys/types.h>
  1826. X+ #include    <xview/xview.h>
  1827. X+ #include    <X11/Xutil.h>
  1828. X+ 
  1829. X+ #include    "manifest.h"
  1830. X+ 
  1831. X+ /************************************************************************/
  1832. X+ EXPORT    void    place_dialog(base, dialog)
  1833. X+ 
  1834. X+ Xv_opaque    base;
  1835. X+ Xv_opaque    dialog;
  1836. X+ 
  1837. X+ {    Rect        br, dr, sr;
  1838. X+     XWMHints    *hints;
  1839. X+ 
  1840. X+     sr = *((Rect *) xv_get(base, WIN_SCREEN_RECT));
  1841. X+     frame_get_rect(base, &br);
  1842. X+     frame_get_rect(dialog, &dr);
  1843. X+     if (rect_right(&br) + dr.r_width < sr.r_width) {
  1844. X+        dr.r_left = rect_right(&br);
  1845. X+        dr.r_top = br.r_top;
  1846. X+        }
  1847. X+     else if (dr.r_width <= br.r_left) {
  1848. X+        dr.r_left = br.r_left - dr.r_width;
  1849. X+        dr.r_top = br.r_top;
  1850. X+        }
  1851. X+     else {
  1852. X+        dr.r_left = br.r_left + 32;
  1853. X+        dr.r_top = br.r_top + 32;
  1854. X+        }
  1855. X+     if (dr.r_top + dr.r_height > sr.r_height)
  1856. X+        dr.r_top = sr.r_height - dr.r_height;
  1857. X+     if (dr.r_top < 0)
  1858. X+        dr.r_top = 0;
  1859. X+     frame_set_rect(dialog, &dr);
  1860. X+ 
  1861. X+     hints = XGetWMHints(xv_get(dialog, XV_DISPLAY), xv_get(dialog, XV_XID));
  1862. X+     hints->flags |= StateHint;
  1863. X+     hints->initial_state = NormalState;
  1864. X+     XSetWMHints(xv_get(dialog, XV_DISPLAY), xv_get(dialog, XV_XID), hints);
  1865. X+     XFree(hints);
  1866. X+ }
  1867. X+ 
  1868. X*** send_mail.c.orig    Fri Nov 30 08:44:44 1990
  1869. X--- send_mail.c    Thu Nov 29 15:58:19 1990
  1870. X***************
  1871. X*** 0 ****
  1872. X--- 1,146 ----
  1873. X+ /************************************************************************/
  1874. X+ /*    Copyright 1990 by Chuck Musciano and Harris Corporation        */
  1875. X+ /*                                    */
  1876. X+ /*    Permission to use, copy, modify, and distribute this software    */
  1877. X+ /*    and its documentation for any purpose and without fee is    */
  1878. X+ /*    hereby granted, provided that the above copyright notice    */
  1879. X+ /*    appear in all copies and that both that copyright notice and    */
  1880. X+ /*    this permission notice appear in supporting documentation, and    */
  1881. X+ /*    that the name of Chuck Musciano and Harris Corporation not be    */
  1882. X+ /*    used in advertising or publicity pertaining to distribution    */
  1883. X+ /*    of the software without specific, written prior permission.    */
  1884. X+ /*    Chuck Musciano and Harris Corporation make no representations    */
  1885. X+ /*    about the suitability of this software for any purpose.  It is    */
  1886. X+ /*    provided "as is" without express or implied warranty.        */
  1887. X+ /*                                    */
  1888. X+ /*    This code contains data and information that is proprietary    */
  1889. X+ /*    to Casio Corporation.  You may be subject to legal action if    */
  1890. X+ /*    this information is released without explicit permission from    */
  1891. X+ /*    Casio.                                */
  1892. X+ /************************************************************************/
  1893. X+ 
  1894. X+ /************************************************************************/
  1895. X+ /*                                    */
  1896. X+ /*    send_mail.c    display a little information window        */
  1897. X+ /*                                    */
  1898. X+ /************************************************************************/
  1899. X+ 
  1900. X+ #include    <stdio.h>
  1901. X+ #include    <sys/param.h>
  1902. X+ #include    <sys/types.h>
  1903. X+ #include    <xview/xview.h>
  1904. X+ #include    <xview/panel.h>
  1905. X+ #include    <xview/textsw.h>
  1906. X+ #include    "boss_ui.h"
  1907. X+ 
  1908. X+ #include    "manifest.h"
  1909. X+ 
  1910. X+ #define        VERSION            "1.0a"
  1911. X+ 
  1912. X+ PUBLIC    boss_base_objects    *boss_base;
  1913. X+ 
  1914. X+ PRIVATE    boss_mail_objects    *dialog = NULL;
  1915. X+ 
  1916. X+ /************************************************************************/
  1917. X+ EXPORT    popup_send_mail(item, event)
  1918. X+ 
  1919. X+ Panel_item    item;
  1920. X+ Event        *event;
  1921. X+ 
  1922. X+ {
  1923. X+     if (dialog == NULL) {
  1924. X+        dialog = boss_mail_objects_initialize(NULL, boss_base->base);
  1925. X+        place_dialog(boss_base->base, dialog->mail);
  1926. X+        xv_set(dialog->other_address, WIN_SHOW, FALSE, NULL);
  1927. X+        }
  1928. X+     xv_set(dialog->mail, XV_SHOW, TRUE, NULL);
  1929. X+     xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  1930. X+ }
  1931. X+ 
  1932. X+ /************************************************************************/
  1933. X+ EXPORT    void    handle_address(item, value, event)
  1934. X+ 
  1935. X+ Panel_item    item;
  1936. X+ int        value;
  1937. X+ Event        *event;
  1938. X+ 
  1939. X+ {
  1940. X+     if (value == 2) {
  1941. X+        xv_set(dialog->other_address, WIN_SHOW, TRUE, NULL);
  1942. X+        panel_paint(dialog->address, PANEL_NO_CLEAR);
  1943. X+        panel_paint(dialog->other_address, PANEL_NO_CLEAR);
  1944. X+        }
  1945. X+     else {
  1946. X+        xv_set(dialog->other_address, WIN_SHOW, FALSE, NULL);
  1947. X+        panel_paint(dialog->address, PANEL_NO_CLEAR);
  1948. X+        }
  1949. X+ }
  1950. X+ 
  1951. X+ /************************************************************************/
  1952. X+ EXPORT    void    done_mail(frame)
  1953. X+ 
  1954. X+ Frame        frame;
  1955. X+ 
  1956. X+ {
  1957. X+     textsw_reset(dialog->message, 0, 0);
  1958. X+     xv_set(frame, XV_SHOW, FALSE, 0);
  1959. X+ }
  1960. X+ 
  1961. X+ /************************************************************************/
  1962. X+ EXPORT    void    send_mail(item, event)
  1963. X+ 
  1964. X+ Panel_item    item;
  1965. X+ Event        *event;
  1966. X+ 
  1967. X+ {    char    cmd[1024], *buf;
  1968. X+     int    val, size;
  1969. X+     FILE    *pipe;
  1970. X+ 
  1971. X+     xv_set(item, PANEL_NOTIFY_STATUS, XV_ERROR, 0);
  1972. X+     val = (int) xv_get(dialog->address, PANEL_VALUE);
  1973. X+     if (val != 2)
  1974. X+        sprintf(cmd, "%s %s", MAILER, xv_get(dialog->address, PANEL_CHOICE_STRING, val));
  1975. X+     else {
  1976. X+        buf = (char *) xv_get(dialog->other_address, PANEL_VALUE);
  1977. X+        if (is_empty(buf)) {
  1978. X+           error("You must specify an alternate address before sending your message");
  1979. X+           return;
  1980. X+           }
  1981. X+        else
  1982. X+           sprintf(cmd, "%s %s", MAILER, buf);
  1983. X+        }
  1984. X+     size = (int) xv_get(dialog->message, TEXTSW_LENGTH);
  1985. X+     if (size == 0) {
  1986. X+        error("Please type a message before sending the mail");
  1987. X+        return;
  1988. X+        }
  1989. X+     if ((pipe = popen(cmd, "w")) == NULL) {
  1990. X+        error("Could not invoke \"%s\" to send mail", cmd);
  1991. X+        return;
  1992. X+        }
  1993. X+     lets_get_busy(boss_base->base, TRUE, NULL);
  1994. X+     buf = (char *) malloc(size);
  1995. X+     xv_get(dialog->message, TEXTSW_CONTENTS, 0, buf, size);
  1996. X+     fprintf(pipe, "Subject: Boss %s comment\n\n", VERSION);
  1997. X+     if (fwrite(buf, 1, size, pipe) != size) {
  1998. X+        error("Could not write message to the mailer");
  1999. X+        free(buf);
  2000. X+        return;
  2001. X+        }
  2002. X+     pclose(pipe);
  2003. X+     free(buf);
  2004. X+     textsw_reset(dialog->message, 0, 0);
  2005. X+     lets_get_busy(boss_base->base, FALSE, NULL);
  2006. X+     xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  2007. X+ }
  2008. X+ 
  2009. X+ /************************************************************************/
  2010. X+ EXPORT    void    cancel_mail(item, event)
  2011. X+ 
  2012. X+ Panel_item    item;
  2013. X+ Event        *event;
  2014. X+ 
  2015. X+ {
  2016. X+     textsw_reset(dialog->message, 0, 0);
  2017. X+     xv_set(item, PANEL_NOTIFY_STATUS, XV_OK, 0);
  2018. X+ }
  2019. X*** window_misc.c.orig    Fri Nov 30 08:44:45 1990
  2020. X--- window_misc.c    Tue Oct 23 14:17:46 1990
  2021. X***************
  2022. X*** 51,182 ****
  2023. X                   NOTICE_BUTTON_YES, "OK",
  2024. X                0);
  2025. X  }
  2026. X- 
  2027. X- /************************************************************************/
  2028. X- EXPORT    void    pinned_menu_notify(menu, item)
  2029. X- 
  2030. X- Menu        menu;
  2031. X- Menu_item    item;
  2032. X- 
  2033. X- {    Xv_opaque    pin_window     = (Xv_opaque) xv_get(menu, MENU_PIN_WINDOW);
  2034. X-     void        (*menu_notify)() = (void (*)()) xv_get(menu, MENU_GEN_PROC);
  2035. X-     void        (*item_notify)() = (void (*)()) xv_get(item, MENU_GEN_PROC);
  2036. X-     
  2037. X-     if (pin_window && xv_get(pin_window, XV_SHOW)) {
  2038. X-        if (menu_notify)
  2039. X-           (*menu_notify)(menu, MENU_NOTIFY);
  2040. X-        if (item_notify)
  2041. X-           (*item_notify)(item, MENU_NOTIFY);
  2042. X-        if (item_notify)
  2043. X-           (*item_notify)(item, MENU_NOTIFY_DONE);
  2044. X-        if (menu_notify)
  2045. X-           (*menu_notify)(menu, MENU_NOTIFY_DONE);
  2046. X-     }
  2047. X- }
  2048. X- 
  2049. X- /************************************************************************/
  2050. X- EXPORT    Panel_setting    filename_completion(item, event)
  2051. X- 
  2052. X- Panel_item    item;
  2053. X- Event        *event;
  2054. X- 
  2055. X- {    char    *p, *expand_filename();
  2056. X- 
  2057. X-     switch (event_action(event)) {
  2058. X-        case '\n' :
  2059. X-        case '\r' :
  2060. X-        case ' '  : if ((p = expand_filename((char *) xv_get(item, PANEL_VALUE))) == NULL)
  2061. X-                  window_bell(xv_get(item, XV_OWNER));
  2062. X-                   else
  2063. X-                      xv_set(item, PANEL_VALUE, p, 0);
  2064. X-                   return(PANEL_NONE);
  2065. X-        case '\t' : return(event_shift_is_down(event)? PANEL_PREVIOUS : PANEL_NEXT);
  2066. X-        default   : return(panel_text_notify(item, event));
  2067. X-        }
  2068. X- }
  2069. X- 
  2070. X- /************************************************************************/
  2071. X- EXPORT    void    place_dialog(base, dialog)
  2072. X- 
  2073. X- Xv_opaque    base;
  2074. X- Xv_opaque    dialog;
  2075. X- 
  2076. X- {    Rect    br, dr, sr;
  2077. X- 
  2078. X-     sr = *((Rect *) xv_get(base, WIN_SCREEN_RECT));
  2079. X-     frame_get_rect(base, &br);
  2080. X-     frame_get_rect(dialog, &dr);
  2081. X-     if (rect_right(&br) + dr.r_width < sr.r_width) {
  2082. X-        dr.r_left = rect_right(&br);
  2083. X-        dr.r_top = br.r_top;
  2084. X-        }
  2085. X-     else if (dr.r_width <= br.r_left) {
  2086. X-        dr.r_left = br.r_left - dr.r_width;
  2087. X-        dr.r_top = br.r_top;
  2088. X-        }
  2089. X-     else {
  2090. X-        dr.r_left = br.r_left + 32;
  2091. X-        dr.r_top = br.r_top + 32;
  2092. X-        }
  2093. X-     frame_set_rect(dialog, &dr);
  2094. X- }
  2095. X- 
  2096. X- /************************************************************************/
  2097. X- EXPORT    int    list_count(item)
  2098. X- 
  2099. X- Panel_item    item;
  2100. X- 
  2101. X- {    int    i, count, rows;
  2102. X- 
  2103. X-     rows = (int) xv_get(item, PANEL_LIST_NROWS);
  2104. X-     for (i = count = 0; i < rows; i++)
  2105. X-        if (xv_get(item, PANEL_LIST_SELECTED, i))
  2106. X-           count++;
  2107. X-     return(count);
  2108. X- }
  2109. X- 
  2110. X- /************************************************************************/
  2111. X- EXPORT    empty_list(item)
  2112. X- 
  2113. X- Panel_item    item;
  2114. X- 
  2115. X- {    int    row;
  2116. X- 
  2117. X-     row = (int) xv_get(item, PANEL_LIST_NROWS);
  2118. X-     for ( ; row > 0; row--)
  2119. X-        xv_set(item, PANEL_LIST_DELETE, row - 1, NULL);
  2120. X- }
  2121. X- 
  2122. X- /************************************************************************/
  2123. X- PRIVATE    set_busy(busy, skip)
  2124. X- 
  2125. X- int    busy;
  2126. X- Frame    skip;
  2127. X- 
  2128. X- {    Frame    subframe;
  2129. X-     int    i;
  2130. X- 
  2131. X-     for (i = 1; subframe = (Frame) xv_get(boss_base->base, FRAME_NTH_SUBFRAME, i); i++)
  2132. X-        if (subframe != skip)
  2133. X-           if (xv_get(subframe, XV_SHOW))
  2134. X-              xv_set(subframe, FRAME_BUSY, busy, NULL);
  2135. X-     xv_set(boss_base->base, FRAME_BUSY, busy, NULL);
  2136. X- }
  2137. X- 
  2138. X- /************************************************************************/
  2139. X- EXPORT    lets_get_busy(busy, skip)
  2140. X- 
  2141. X- int    busy;
  2142. X- Frame    skip;
  2143. X- 
  2144. X- {    static    int    depth = 0;
  2145. X- 
  2146. X-     if (busy) {
  2147. X-        if (depth == 0)
  2148. X-           set_busy(TRUE, skip);
  2149. X-        depth++;
  2150. X-        }
  2151. X-     else if (depth > 0)
  2152. X-        if (--depth == 0)
  2153. X-           set_busy(FALSE, NULL);
  2154. X- }
  2155. X--- 51,53 ----
  2156. END_OF_FILE
  2157. if test 65348 -ne `wc -c <'patch'`; then
  2158.     echo shar: \"'patch'\" unpacked with wrong size!
  2159. fi
  2160. # end of 'patch'
  2161. fi
  2162. echo shar: End of shell archive.
  2163. exit 0
  2164.  
  2165. Chuck Musciano                ARPA  : chuck@trantor.harris-atd.com
  2166. Harris Corporation             Usenet: ...!uunet!x102a!trantor!chuck
  2167. PO Box 37, MS 3A/1912            AT&T  : (407) 727-6131
  2168. Melbourne, FL 32902            FAX   : (407) 729-3363
  2169.  
  2170. A good newspaper is never good enough,
  2171.     but a lousy newspaper is a joy forever.        -- Garrison Keillor
  2172.  
  2173. --
  2174. Dan Heller
  2175. ------------------------------------------------
  2176. O'Reilly && Associates               Zyrcom Inc
  2177. Senior Writer                   President
  2178. argv@ora.com            argv@zipcode.com
  2179.